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Cross Assemblers continue to appear. We now have ready a 
version for the Intel 8048, and one for the yet unreleased 
Rockwell 65C02. More on the latter inside. 


Don Lancaster, famous author of many books published by Howard 
Sams, says the Apple II is probably going to have a greater 
impact on history than the automobile or television! Perhaps 
verging on Applolatry, but you will surely enjoy his new book. 
See Bill's reviews inside. 


If I am trying to learn how to program in assembly language, or 
to increase my skill at it, what (besides AAL) should I read? 

I strongly recommend Softalk, Nibble, Micro, and Call APPLE. 
Every month they publish excellent examples of assembly 
language programs which you can study, modify,.,and use. As for 
books, Roger Wagner's, Lance Leventhal's, and Don Lancaster's 
are my favorites at this time. 


Making Internal JMPs and JSRs Relocatable.........Peter Meyer 


A machine language routine is said to be relocatable if it can 
function properly regardless of its absolute location in 
memory. If a routine contains a JMP or a JSR to an INTERNAL 
address then it is not relocatable; if it is run in another 
part of memory then the internal JSR or JMP will still 
reference the former region of memory. JMPs and JSRs to 
subroutines at absolute locations (e.g. in the Monitor) do not 
impair the relocatability of a routine. 


I will explain here a technique whereby you can, in effect, 
perform internal JSRsS and JMPs without impairing the 
relocatability of your routine. There is a small price to pay 
for this: namely, an increase in the length of your routine. 
Your routine must be preceded by a 2-part Header Routine which 
is 43 bytes long. In addition, each internal JSR requires 8 
bytes of code, and each internal JMP requires 11 bytes of code. 


No tables or other data storage are required, except that three 
bytes must be reserved for a JMP instruction. These three 
bytes can be anywhere in memory, but must be at an absolute 
location. There are three bytes that normally are used only by 
Applesoft, namely, the ampersand JMP vector at $3F5 to $3F7. 
Since we are here concerned only with machine language routines 
in their own right, we can use the locations $3F5 to $3F7 for 
our Own purposes. However, other locations would do just as 
well. 


The technique is fully illustrated in the accompanying assembly 
language program. This routine consists of three parts: 


(1) Header Part 1 (SETUP), which sets up a JMP instruction 
at VECTOR (at S3F5-S3F7, but could be different, as 
explained above) to point to Header Part 2. 


(2) Header Part 2 (HANDLER), which is a 15-byte section of 
code whose task is to handle requests to perform internal 
JSRs and JMPs (more on this below). 


(3) The main part of the routine, in which internal JSRs 
and JMPs (in effect) are performed using macro 
instructions. 


When your routine (including the Header) is executed, the first 
thing that happens is that Header Part 1 locates itself (using 
the well-known JSR SFF58 technique), then places a JMP HANDLER 
at VECTOR. Thereafter a JMP VECTOR is equivalent to JMP 
HANDLER, and a JSR VECTOR iS equivalent to a JSR HANDLER. The 
HANDLER routine handles requests from your routine for internal 
JSRs and JMPs. To perform a JSR to an internal subroutine 
labelled SUBR simply include the following code: 


HERE LDA #SUBR-HERE-7 low byte of offset 
LDY /SUBR-HERE-7 high byte of offset 
TSX 
JSR VECTOR 
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S-C Macro Assembler (the best there is!)..... oratinere eens GS 8-8 ieeeas3380%00 
S-C Macro Cross Assembler Modules 


65CO2 VE6LSi ON biiwaeee wn doe ee sees ee ea ee eee Liste waeees © 20-00 
6800/6801/6802 VerSion.... cc cece cncccccveccvvees awa Gwe Maeeeisires ee ae<50 
6809 VErSlOM so ed wee 5 hee eS ee eens ere eee ee ee ee ee ee eer er eee eo) | 
Z=80) VERS TON su tedina: bl alee Gere Sw eww See sa) ib ee Ow Raa a eas cae oes 50 
68000 Version... .cccsecece Sasksnah Pere baiiese atteacce) ore ie: Ores omar ee bewie 6 DOs 00 


Requires ownership of S- C Macro Assembler. 
Each disk includes regular and language card versions. 
Upgrade from Version 4.0 tO MACRO....cccescececs i aiak: i aoa Mews ato ee Avera ah PLO e 00 
Source code of Version: 4.0 OR G1 SK ies: 6a 6 66 S66 ee 6 ew KW WO ew $95.00 
Fully commented, easy to understand and modify to your own tastes. 


Applesoft Source Code on DiSk.......ee. er ee ere ee ee eee ee 990.00 
Very heavily commented. Requires Applesoft and S- C Assembler. 


ES-CAPE: Extended S-C Applesoft Program EditOr...ccecervveesveveee 900.00 


BAL Quarter Ly DiSk S s:ss 6.8 sed wees 6S Swe wee Bw eer eee wen «ceack $15.00 
Each disk contains all the source code from three issues of "Apple 
Assembly Line", to save you lots of typing and testing time. 

QD#1l: Oct-Dec 1980 QD#2: Jan-Mar 1981] QD#3: Apr-Jun 1981 
QD#4: Jul-Sep 1981 QD#5: Oct-Dec 1981 QD#6: Jan-Mar 1982 
QD#7: Apr-Jun 1982 QD#8: Jul-Sep 1982 QD#9: Oct-Dec 1982 


Double Precision Floating Point for Applesoft.......... ee a ee ee ae - $50.00 
Provides 21l-digit precision for Applesoft programs. 
Includes sample Applesoft subroutines for standard math functions. 


FLASH! Integer BASIC Compiler (Laumer Research)......(regular $79) $49.00 
Special price to AAL readers only, until 12/31/82! 
Source Code for FLASH! Runtime Package... ccccccsvcccccsccccessvesee 93 Ie OD 


Super Disk Copy III (Sensible Software).............(reg. $30.00) $27.00 

Amper-Magic (Anthro-Digital) ....cccccsccccccsssveese (LEG. $75.00) $67.50 

Quick-Trace (Anthro-Digital) ... ccc ccc cee cee eee eee vee (LEG. $50.00) $45.00 

Cross-Reference and Dis-Assembler (Rak-Ware) ....cccscecvcccsvecesee 949.00 

Apple White Line Trace (Lone Star Industrial Computing)........ ov ee 950.00 
(A unique learning tool) 


Blank Diskettes (with hub ringS)......eeeee- oseeee package of 20 for $50.00 
Small 3-ring binder with 10 vinyl disk pages and diSkS........+.+--$36.00 
Vinyl disk pages, 6"x8.5", hold one disk each.........eeee---10 for $4.50 
Reload your own NEC PC-8023 ribbon cartridges...........each ribbon $5.00 
Diskette Mailing Protectors........ Cates iceadseveseLO-99:s “40 cents each 

100 or more: 25 cents each 


AShbysShite=Key MOG). a oa. dcsrds eas we Aes wa ee elle Sate wee Oe ea ere owe eoro«00 

Paymar Lower-Case Adapter.....eeees bie Wiis astete, Sb cete WM, WG Vee a Re ee ere eae oa OU 
For Apples before Revision 7 only 

Lower-Case Display Encoder ROM.ccecccesesvccccscvvccsscscssvccccssees 929200 
Works only Revision level 7 Apples. Replaces the encoder ROM. 


BookS, BOOKS, BOOKS. ..ceeeeevccceseceveseeveeseCompare Our discount prices! 
"Enhancing Your Apple II, vol. 1", Lancaster.........($15.95) $15.00 
"Incredible Secret Money Machine", LancaSter.....-+22- ($7.95) $7.50 
"Micro Cookbook, vol. 1", LancaSter....cccccccvvceeee (915.95) $15.00 
"Beneath Apple DOS", Worth & Lechner... ...ccccsccccee ($19.95) $18.00 
"Bag of Tricks", Worth & Lechner, with diskette......($39.95) $36.00 
"Apple Graphics & Arcade Game Design", Stanton.......($19.95) $18.00 
"Assembly Lines: The Book", Roger Wagner.....eeeeeee- ($19.95) $18.00 
"What's Where in the Apple", Second Edition..........($24.95) $23.00 
"6502 Assembly Language Programming", Leventhal......($16.99) $16.00 
"6502 Subroutines", Leventhal... cecwvwveesvoesseseeee (S12. 99) $12.00 
"MICRO on the Appie--i", includes Bish CER aahaedoneiteed: $5) $23.€0 
"MICRO on the Apple--2", includes diskette.........++ ($24.95) $23.00 
"MICRO on the Apple--3", includes diskette.......6+.- ($24.95) $23.00 


*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 *** 
alias (214) 324-2050 aiaiis 
*** We take Master Charge, VISA and American Express *** 
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As explained above, the JSR VECTOR is in effect a JSR HANDLER. 
The Header Part 2 code takes the values in the A and Y 
registers and adds them to an address which it obtains from the 
stack to obtain the address of SUBR. It then places this 
address in INDEX (S5E,5F) and executes "JMP (INDEX)". 


An internal JMP, from one part of your routine to another, is 
performed in a Similar manner. Suppose you wish to JMP from 
HERE to THERE. It is done as follows: 


HERE LDA #THERE-HERE-7 low byte of offset 
LDY /THERE-HERE-7 high byte of offset 
TSX 
JSR SFF58 
JMP VECTOR 


Since we are (in effect) performing a JMP, rather than a JSR, 
we do a JMP VECTOR rather than a JSR VECTOR. The other 
difference is that we have a JSR SFF58 following the TSX. 


Clearly the sequence of instructions which allows you to 
perform a JMP or a JSR could be coded aS a macro. The macros 
to use are shown in the accompanying program listing. By uSing 
macros an internal JMP or JSR can be performed with a single 
macro instruction bearing a very close resemblance to a real 
JSR or JMP instruction. 


The following program, which consists of the Header Routine 
plus a demonstration routine, can be assembled to disk using 
the .TF directive. It can then be BRUN at any address and it 
will function properly. Thus it is relocatable, despite the 
fact that there are (in effect) an internal JMP and two 
internal JSRs performed. 


When performing an internal JSR or JMP uSing my techniques, it 
is not possible to pass values in the registers, since these 
are required to pass information to the HANDLER routine. Nor 
is it advisable to try to pass parameters on the stack, even 
though the HANDLER routine does not change the value of the 
stack pointer. Better is to deposit values in memory and 
retrieve them after the transition has been made. 


The HANDLER routine passes control to the requested part of 
your routine uSing a JMP indirect. (INDEX at S$5E,5F, has been 
used in the accompanying program, but any other address would 
do as well, provided that it does not cross a page boundary.) 
This means that the section of your routine to which control is 
passed (whether or not it is a subroutine) may find its own 
location by inspecting the contents of the location used for 
the JMP indirect. This feature of this technique is also 
illustrated in the accompanying program, in the PRINT.MESSAGE 
subroutine. 


The use of internal data blocks is something not normally 
possible in a relocatable routine, but it can be done if the 
techniques shown here are used, 


This method of performing internal JSRs and JMPs ina 
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relocatable routine may be simplified if the routine is 
intended to function as a Subroutine appended to an Applesoft 
program. If the subroutine is appended using my utility the 
Routine Machine (available from Southwestern Data Systems), 
then it is not necessary to include the 47-byte Header Routine. 
Internal JMPs and JSRs can still be performed exactly as 
described above, except that the address of VECTOR must be 
S3F5-S3F7. This technique is not described in the 
documentation to the Routine Machine. A full explanation may 
be found in the Appendix to the documentation accompanying 
Ampersoft Program Library, Volume 4 (also available from 
Southwestern Data Systems). 


1000 | .TF B.MEYER.1 
1010 S&--------~-- eee +--+ - = 
1020 #* SETUP AND HANDLER ROUTINES 
1030 * TO ALLOW INTERNAL JSRS AND 
1040 #*  JMPS IN A RELOCATABLE MACHINE 
1050 * LANGUAGE ROUTINE 
1060 # 
1070 # BY PETER MEYER, 11/3/82 
1090 # LOCATIONS 
005E- 1110 INDEX -EQ $5E,5F 
0100- 1120 STACK -EQ $106 - $1FF 
03F5- 1130 VECTOR .EQ $3F5 - $3F7 
1190 # MACRO DEFINITIONS 
1170 .MA JSR 
1180 :1 LDA #]1-:1-7 
1190 LDY /]1-:1-7 
1200 TSX 
1210 JSR VECTOR 
1220 . EM 
isko .MA JMP 
1250 :1 LDA eileen 
1260 LDY /J1-:1-7 
1270 TSX 
1280 JSR $FF58 
1290 JMP VECTOR 
nos 
1320 # HEADER PART 1 
0800- 20 58 FF 1380 SETUP JSR $FF58 FIND OURSELVES 
{he ant 
0805- AQ 1A 1370 LDA #HANDLER-SETUP-2 
0807- zp FF 00 1380 .DA #$7D,STACK-1 FORCE ABS,X MODE 
O80A- 8D F6 03 1390 STA VECTOR+1 
O80D- AX 00 1410 LDA /HANDLER-SETUP-2 
O80F- 7D 00 01 1420 ADC STACK,YX 
0812- 8D F7 03 14 30 STA VECTOR+2 
0815- AX AC 1450 LDA #$4C n"JMP® 
0817- 8D F5 03 1460 STA VECTOR 
O81A- DO OF 1470 . BNE MAIN.ROUTINE ALWAYS 
1490 ® HEADER PART 2 
1500 
1510 HANDLER 
1520 
1530 ® ON ENTRY A,Y HOLD OFFSET 
1540 ® FOR JMP OR JSR FROM ROUTINE 
1590 * Xx IS STACK POINTER FROM BEFORE LAST JSR 
081C- 18 1570 CLC 
081D- © FF 00 1580 -DA #$7D,STACK-1 FORCE ABS,X MODE 
0820- 85 5E 1590 STA INDEX 
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Now, from the programming experts at S.D.S., 
an easy-to-use way of putting the POWER 
and SPEED of machine language routines in 
YOUR OWN APPLESOFT PROGRAMS! 


ROUTINE MACHINE does all the work for you — 
no knowledge of machine language pro- 
gramming, whatsoever, is required. Simply 
choose the routine you need from an ever- 
growing library, and Routine Machine will 
effortlessly put them in your program, and 
all done transparently! No need to be aware 
of or bother with BLOAD’s, HIMEM:, efc. 


Best of all, with just this starter package, you'll 
have the routines to put High Resolution 
graphics and sound in your programs im- 
mediately! Also included is a versatile print 
using module to banish the “decimal point 
demons” forever! To round out the package, 
we've also included powerful search and 
sort routines (for single dimension arrays; 
Search: 1000 elements in 1 second, Sort: 1000 


HHeSeGsese sets Fetes Ssseeesesesetst eee se 


OUR GUARANTEE 


« IF YOU DONT SAVE MORE THAN THE PUR- 
: CHASE PRICE OF ‘ROUTINE MACHINE’ IN 
s YOUR OWN PROGRAMMING TIME IN THE 
+ FIRST 30 DAYS YOU OWN IT, SIMPLY RE- 
: TURN IT FOR A COMPLETE REFUND, NO 
* QUESTIONS ASKED! 


TRO RRR RRR ERE SSE ESE SE 


SHS ae 


elements in 90 seconds), and a number of 
other often-needed routines as well (30 
routines in all). 


some of the other routines in The Routine 
Machine (plus others not listed) are: 


SWAP: Swaps two string or numeric values. 

TEXT OUTPUT: Prints with no “word break” on 
screen. 

STRING INPUT: Input any string, regardless of 
commas, etc. 

ERR: Stack fix for Applesoft ONERR handling. 

GOTO, GOSUB: Allows computed statements. 
Example: GOTO X*5 or GOSUB X*5. 


BLOAD: Load any binary file 5 times faster than 
normal. Hi-Res pictures load in under 2 
seconds. 


RESET HANDLER: Treats RESET with ONERR:; or will 
RUN or reboot disk. 


HI-RES ASCII: Character set for mixing text Hi-Res 
graphics. 


TURTLE GRAPHICS: Versatile Hi-Res graphics rou- 
tines for easy drawing of Hi-les figures. 


SYSTEM REQUIREMENTS: 48K Apple II, DOS 3.3 w/FP 
ROM or language card. 


PRICE: $64.95 California residents add 6% sales tax. 


Additional library disks titled “Ampersoft Program 
Library” are already available. 


Apple Il and Applesoft are both trademarks of Apple Computer, Inc. 


soutnwestern dato systems 


P.O. BOX 582 « SANTEE, CALIFORNIA 92071 « TELEPHONE: 619/562-3221 
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FOR EXAMPLE 


MAIN ROUTINE, 
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Q98E- 20 24 FC ont JSR VTABZ 
991- 2280 >JMP MAIN.LOOP 
991- AX 99 0O000> :1 LDA #MAIN.LOOP-:1-7 
993- AO FE 0000> LDY /MAIN.LOOP-:1-7 
995- BA 0000> TSX 
996- 20 58 FF 0000> JSR $FF58 
999- 4C F5 03 0000> JMP VECTOR 
2290 Benn nnn ne ee en ee ee nn en ee eee 
99C- 41 41 AC 
99F- AO 2300 AALQT .AT /AAL / 
Q9AO- OD OD 2310 LONGQT .HS ODOD 
QA2- 20 41 20 
9A5- 50 20 50 
QA8B- 20 HC 20 
QAB- 45 20 20 
QAE- 20 41 20 
9Bi- a 20 53 
9B4- 20 45 20 
9B7- 4D 20 42 
9BA- 20 4C 20 
9BD- 59 20 20 
9CO- 20 AC 20 
aa 49 20 HE 
9C6=- 20 45 20 2320 ~AS / APPLE ASSEMBLY LINE / 
9C9- OD 02 2330 ~-HS ODO2 
9CB- 20 20 53 
9CE- 20 2D 20 
9Di- 43 20 20 
9D4H- 20 53 20 
9D7- AF 20 46 
Q9DA- 20 54 20 
9DD- 24 20 41 
QEO- 20 52 20 
9E3- 45 20 20 
9E6- 20 43 20 
9E9- 4F 20 52 
QEC- 20 50 20 
QEF- 2E 20 AO 2340 ~—AT / S-=-C SOFTWARE C OR P / 


RAM/ROM PROGRAM DEVELOPMENT BOARD $35.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip. Use a 6116 type RAN chip for 
program development or sust extra memory. Plugin a programmed 2716 EPROM to Keep your favorite routines 
‘on-line’. Maps into $Cn00-6CnFF and $C800-SCFFF memory space. Instructions & circuit diagram provided. 


The “MIRROR?” : Firmware for Apple—-Cat $29.00 
Communications ROM plugs directly into Novation’s modem card. Three basic modes: Dumb Terminal, Remote 
Console & Programmable Hodem. Added features include: Printer buffer, Pulse or Tone dialing, true 
dialtone detection, audible ring detect and ring-back option. Directly supports many 80-column boards 
(even while printing) and Apple’s Comm card commands. (Apple-Cat Hardware differences prevent 1007 
interchangability with Comm card.) Includes Hayes-to-AppleCat register equivalances for software 
conversion. Telephone Software Connection (213-516-9430) has several programs which support the ‘MIRROR’. 


The “PERFORMER’ ; Smarts For Your Printer $45.00 
bet the most from your smart printer by adding intelligence to your ‘dumb’ interface card. The PERFORMER 


Board plugs into any Apple slot for immediate access (no programs to find and toad). Easily select 
printer fonts and many other features via a user-friendly menu. Replaces manual printer set-up. No need 
to remember ESC commands. Also provides TEXT and GRAPHICS screen dumps. Compatible with Apple, Tymac, 
Epson, Microtek and similar ‘dumb’ Centronics type parallel I/F boards. Specify printer: EPSON MX80 
W/Graftrax-80, EPSON MX100, EPSON MX80/MX100 W/Graftrax Plus, NEC 80230, C.Itot 8510 (ProWriter), OKI 
Microline 82A/83A W/OKIGRAPH. (OKI Bonus: The PERFORMER Generates ENHANCED and DOUBLE STRIKE Fonts) 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Fuil Payment With Order: 
FAK -WARE 
41 Ralph Road 
West Orange NJ a70S2z 


eeeee SAY YOU SAW TT IN “APPLE ASSEMBLY LINE trees 
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APPLE PERIPHERALS ARE OUR ONLY BUSINESS 


TIME tl 
THE MOST POWERFUL, EASIEST TO USE CLOCK FOR YOUR APPLE 


@ Tame tn hours, minutes and seconds 
@ Date with year, month. day of week and leap year 


@Will enhance programs tor accounting. time and energy management, 
remote control of appliances. laboratory analysis. process control, 
and more. 


@ 24 hour military format or 12-hour with AM/PM indication. 


@ User selectable interrupts permit toreground/background operation 
of two programs simultaneously 


@ Crystal controtied for 0005% accuracy 
@ Easy programming in basic 


@On board battery backup power tor over four 
operation (baltery charges when Apple 's on) 


@ Twenty seven page operating manual included with many examples 
ol programs to use with your Apple in any contiguration 

@ Includes disk containing a DOS Daler and many other time oriented 
utilities plus over 25 user contributed programs al no extracost 


PRICE $129.00 


SUPER MUSIC SYNTHESIZER 


@ Complete 16 voice music synthesizer on one card Just plug it into 
your Apple, connect the audio cable (supplied) to your stereo and 
bool the disk supplied and you are ready to input and play songs 

@\t's easy to program music with our compose software. You will start 


ngnt away al inpulting your favorite songs The Hi-Res screen 
snows what you have entered in standard sheet music format. 


@We give you lots of software. In addition to Compose and Play 
programs. the disk is filled with songs ready to run 


@ Easy to program in basic to generate complex sound elfects 

@ Four white noise generators which are great for sound eflects 

@ Plays music in true stereo as well as true discrete quadraphonic 
@ Envelope control. 


@ Will play songs written for ALF synthesizer (ALF software will not 
take advantage of al! the features of this board The software 
sounds the same in our synthesizer ) 

®@ Automatic shutotf on power-up or if reset 1s pushed 


@ Many many more features 


PRICE $159.00 


ANALOG TO DIGITAL CONVERTER 


@ 8 Channels 

@ 8 Bit Resolution 

@ On Board Memory 

@ Ratiometric Capability 
@ Fast Conversion (.078 ms per channel) 


@Eliminates Tne Need To Wait For 
Conversion ust PEEK at data) 


@ AID Process Totally Transparent to Apple 
(looks like memory) 


The analog to digital conversion takes place on a continuous, channel 
sequencing basis. Data is automatically transferred to on board 
memory at the end of each conversion. No A/D converter could be 
easier to use. 


Our A/D board comes standard with 0. 10V full scale inputs These 
inputs can be changed by the user to 0. -t0V or -5V_ + 5¥V or other 
fanges as needed 

The user connector has + 12 and -12 volts on it so you can power your 
sensors (These power sources can be turned off with on board dip 
switch) 

Accuracy 03% input Resistance 20K Onms Typ 
A few applications may include the monitoring of @ flow @ 
temperature @ humidity @ wind speed ® wind direction @ light 
intensity © pressure @ APM @ soil moisture and many more 


PRICE $129.00 


DIGITAL INPUT/OUTPUT BOARD 


@ Provides 8 buffered outpuls to a standard 16 pin sockel for standard 
dip ribbon cable connection. 


@ Power-up reset assures that all outputs are off when your Apple is 
first turned on 


@ Features 8 inputs that can be driven from TTL logic or any 5 volt 
source. 


@ Your inputs can be anything from high speed logic to simple 
switches 


@ TOTALLY compatible with all CP/M software. 
@ Executes the full 2-80 and 8080 instruction set. 
@Allows you (o run your Apple CP/M based programs 


@ Does EVERYTHING the other Z-80 boards do. plus supports 280 
interrupts 


@ Hardware and software settable switch options 


@ Anon-card PROM eli inates many |.C.'s for a cooler, less power 
consuming board 


® Complete documentation included (user must furnish software) 


@ Very simple to program. just PEEK at the data 

@4 other outputs are also provided. User 1 reset. interrupt request 
non-maskable interrupt. 

@ Now on one card. you can have 8 digital outputs and 8 digital inputs 
each with its own connector The super input/output board is your 
best choice for any control application 

PRICE $62.00 


Z-80 CARD 


PRICE $139.00 


Since cucmcephon Applhed Enqmeeany has continually expanded us line of Apple penpherals bringing you easy 1O-use designs 
We aie the mnovatecs not the amidators Uhbsig, state of he att technaloqges Applhed Enqaeenng 1 Contaudlly umproving its pre 
feceal development Apphed Engineenag offers you Ihe niqhest quality penpherals at the lowest possible price 

Apphed Enaqineennq s products ate tully tested with complete documentation and available tor unmediale delivery Ali products ale guafanteed with a one year 
wothaaty 

Send Check or Money Order to 
APPLIED ENGINEERING 
P.O. Box 470301 


Dallas, TX 75247 


See Your Dealer 
or Call (214) 492-2027 
7 Days a Week 
Master Card & Visa Welcome 


All Orders Shipped Same Day. 
Texas Residents Add 5% Sales Tax. 


Add $10.00 if Outside U.S.A. 
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Add Bit-Control to Apple Monitor...........-Bob Sander-Cederlof 


The other day someone sent me a disk with an article for AAL on 
it as a binary file. The codes in the file were all ASCII 
characters, but they were nevertheless not compatible with any 
word processors I had around. 


All blanks were coded as SAO (hi-bit on), and all other 
Characters were coded in the range S0O0-S7F (hi-bit off). 
Otherwise, everything was compatible with my favorite word 
processor (the one I am still in the process of finishing). 


I need to have all the hi-bits set to one in the file, or in 
the memory image after BLOADing the file. That's the 
motivation for the following neat enhancement to the Apple 
monitor. 


The enhancement hooks in through the control-Y user command 
vector. By merely typing: 


*80FF<2000.3FFFY (“Y means control-yY) 
I set all the hi-bits between $2000 and S3FFF. 


The "80FF" in the command line above is the magic part of this 
enhancement. The last two digits are ANDed with every byte in 
the specified range, clearing every bit which is zero in those 
two digits. By uSing SFF, no bits are cleared. Other values 
for these two digits will clear whatever bits you wish. 


The first two digits are ORed into every byte in the specified 
range, setting every bit which is one in the two digits. $80 
in my example sets the top bit in every byte. 


The code is designed to be BRUN from a binary file, and it is 
completely relocatable. You can BRUN it anywhere in memory 
that you have room for 36 bytes. That is why the SETUP code is 
longer than the actual control-Y code! 


The SETUP routine first discovers where in memory it is 
running, and then sets up the control-Y vector in page 3 to 
point at the BITS code. The discovery is done in the usual 
way, by JSRing to a guaranteed RTS in the monitor ROM, at 
SFF58. This leaves a return address just below the stack 
pointer. I pick up that address and add the difference between 
that and BITS to get the appropriate control-Y vector pointer. 


Line 1200 needs a little explanation. My assembler 
automatically switches to page zero addressing mode if the 
address is less than $100. STACK-1 is less than $100, so "ADC 
STACK-1,X" would assemble as though I wrote "ADC SFF,X". 
Indexed addressing in page zero mode stays in page zero, 
wrapping around. If X=3, "ADC SFF,X" would reference location 
$02 in page zero rather than $102. Therefore I had to use the 
".DA #$7D" to force the assembler to use a full 16-bit address 
mode. (Some assemblers have a special way of forcing 16-bit 
addressing in cases like this; others require special marks to 
get zero-page modes.) 
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BITS itself is very Straightforward code. The monitor leaves 
the starting address of the specified range in Al ($3C,3D), the 
ending address in A2 (S$3E,3F), and the mask in A4 ($42,43). 

The subroutine at SFCBA increments Al and compares it to A2, 
leaving carry clear if the range is not yet complete. 


WOOO) @seusewecedoctesceesseeesseec ses 
1010 8 MONITOR CTRL-Y COMMAND 
1030 TO SET AND CLEAR ANY COMBINATION 
100 : OF BITS IN A RANGE OF MEMORY 
105 
1060 8 ®MASK<ADR1.ADR2Y (WHERE Y¥ MEANS CTRL-Y) 
1060 8 MASK = XXYY BITS = 0 IN YY WILL BE CLEARED 
1090 # BITS = 1 IN XX WILL BE SET 
NGO: Wacctecteee eve toua seco e oe ae cess 
003¢~ 1110 Al -EQ $3C 
OO 3 1120 fk STE 
Toe. 1189 STACK -EQ 180 
0800- 20 58 FF 1160 SETUP JSR $FF58 FIND SELF FIRST 
phohe oe 1180 tLe 
o805 ae oEOonobG Lee etd STACK~ 1, FORCE ABS,X MODE 
- 7D F ; = 
OBOA. Bb FO 03 1210 STA $319” MONITOR CTRL-Y VECTOR 
OBOD- £9 00 1220 LDA /BITS-SETUP-2 
OBOF- 7B 00 01 1230 ADC STACK ,X 
0812+ 8D FA 03 1240 STA $3FA 
0815- 60 1250 RTS 
0816- Bi 3¢ 1270 BITS LDA (A1),¥ GET NEXT BYTE IN SPECIFIED RANGE 
0818- 25 he 1280 AND A4L CLEAR BITS USING LO-BYTE OF MASK 
O81A- 05 43 1290 ORA AYH SET BITS FROM HI-BYTE OF MASK 
OB1C- 91 3c 1300 STA (At) Y STORE MODIFIED BYTE 
OB1E- 20 BA FC 1310 JSR $FcBh ADVANCE POINTER 
0821- 90 F3 1320 BCC BITS MORE IN RANGE 
0823- 60 1330 : RTS FINISHED 


Regain control of your Applel 

Switch between new (Autostart) 

and old Monitor ROM (with hard 

RESET) to study programs which 
control the RESET vector. Run your own Monitor 
or other commercial firmware. Switch any one 
of three devices, elther Apple ROMs or type 
2716 EPROMs, Into sockets DO-F8. ROMs/EPROMs 
evallable separately. 


* Convenient ROM/EPROM switching 
Plugs Into any motherboard ROM socket 
* Run firmwere iike CMW "Super Catalog" or 
Omega “The inspector” (TM) 
* Up to four PS-1s per system 
ROMs not Included Model PS-1 .... $49.95 


"SUPER CATALOG" ROM 
SIngte key progrem selection; RUN, LOAD etc. 


Specify socket DO-FO Model CR-1 .... 


The Promette ~ 
Safely plug 2716 EPROMs Into 
sockets DO-F8. Install 
commercial or your own EPROM 
firmware on the motherboard. 
Eltminates bus contention 
and possible damage of hardwired approach. 


$14.95 


* Adapts 2716s to DO-F8 sockets 

* Low profile; stack side-by-side 

* Easy EPROM mounting; no soldering 
EPROM not Included Mode! PC-1! .... $4.95 
CRE REESE REECE REE REESE EES EERE EEE ELECT ES ESS 


SPECIAL NEW PRODUCT INTRODUCTORY OFFER 
Deduct 15% from the IIisted prices! To obtain 
discount, specify the publ!icaton name and date 
on order. Good for 60 days from pub. date. 


Take charge of Disk 1! oper- 

ation. Eltliminate accidental 

file erasure! Write to 

unnotched diskettes] OSK kits 

atlow you to manually override 
the Disk It"s internal write protect switch. 
SAFE mode prevents writing; WRITE mode over- 
rides a protect tab; MODE X (OSK-2 Only) 


Indicates write enabled to the Apple, but does 
not write. Switch mounts In drive front panel. 


Full tnstructions; easy to Install. 


Total control of write protect status 

Attractive switchplate matches drive decor 

Positive status Indication (LEDs) 

Three Modes (DSK-1): SAFE, NORMAL, WRITE 

Four Modes (OSK-2): SAFE, NORMAL, WRITE, X 
Model DSK-? ....$11.95 


Mode! OSK-2 ... $19.95 


ASSEMBLED DISK SWITCH KITS 
Get the improved programming efficiency of the 
Disk Switch Kit, without the bother of kit 
building. All parts for a DSK-1 are sounted 
and wired on a replacement drive faceplate 
(plain (DSA-1) or Apple logo (DSA-2)). 


Model DSA-1... 634.95 Model DSA-2... 8359.95 
SSHSPSRESSHSSHHSHESHHSHSSHHCHHERHRRERRER DEERE Ee 


Add $2.00 for shipping OH add 5.5% sales tax 
Mastercerd, Vise, MO, Check, COD (add $1.40), 
TMs Apple Computer inc, Omega MicroWare inc 


DEALER INQUIRIES INVITED 


CompuTen Micro Wonks. INc 
P.O. Box 3365! Deyten, Ohie 45433 


(305) 777-0208 
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D-. cision 


Decision Systems 
S P.O. Box 13006 
ystems Denton, TX 76203 
817/382-6353 


DIS-ASSEMBLER 


DSA-DS dis-assembles Apple machine language programs into forms 
compatible with LISA, S-C ASSEMBLER (3.2 or 4.0), Apple's TOOL- 
KIT ASSEMBLER and others. DSA-DS-dis~assembles instructions or 
data. Labels are generated for referenced locations within the 
machine language program. 

$25, Disk, Applesoft (32K, ROM or Language card) 


OTHER PRODUCTS 


ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much. 

$50 Disk, Applesoft. 


PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE.... CASE, SELECT, and many more. Develop 
programs for integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 

$35. Disk, Applesoft (48K, ROM or Language Card). 


FORN.-DS is a complete system for the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 

$25 Disk, Applesoft (32K, ROM or Language Card). 


UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft’s CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 

$25 Disk, Applesoft. 


SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution. Improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 
garbage clean-up. Author: Lee Meador. 

$15 Disk, Applesoft (32K, ROM or Language Card). 


(Add $4.00 for Foreign Mail) 


*Apple Il is a registered trademark of the Apple Computer Co. 
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Assembly LisStings on TEXT Files...........-Bob Sander-Cederlof 


Today Jules Gilder called, asking for patches to allow sending 
the assembly listing to a TEXT file. He is in the process of 

writing a book, and wanted the listings on TEXT files so they 

could be automatically typeset. 


My first response was a familiar one: "It is a very difficult 
problem, because of the interaction of .IN and .TF files." 


"But I don't need .TF or .IN files!", he swiftly parried. 


Suddenly in a flash of insight I saw that it could be EASILY 
done. All that is needed is to patch the .TF directive so that 
it opens a TEXT file, but does not set the TF-flag. Then all 
listing output will go to the text file, and the object code 
will go to the current origin or target address. 


Here are the patches for the motherboard version: 
:$2998:A5 60 DO 03 20 6A 2A 4C 04 IF 

And the language card version: 
:$C083 C083 EAE4:A5 60 DO 03 20 B6é EB 4C 50 EO 


Note that the two "C083's" above write-enable the language card 
so the patches will be effective. 


After the patches are installed, a .TF directive will direct 
the listing to your text file. Here is an example: 


-TF T.LISTING 
SAMPLE LDA #3 

STA $06 

RTS 


Just remember that the normal use of .TF is not available when 
this patch is in place; also that .IN should not be used. 
Using .IN would turn off the listing output, directing it back 
to the screen. 


Quickie NO. lececccccccccccccccccccccsesceee e BOD Sander-Cederlof 


To merge selected bits from one byte with the rest of the bits 
of another byte: 


Code Example 
LDA MASK 00011111 
EOR #SFF 11100000 
ORA BYTE] 111xxxxx 
STA TEMP 
LDA BYTE2 YYY2ZZ2z 
ORA MASK yyylllll 
AND TEMP YYYXXXxXx 
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Add a New Feature to ES=CAPE uy o6eibaste ot Sewer ae Bla t Linn 


Since most of the owners of ES-CAPE also subscribe to the Apple 
Assembly Line, I thought I would pasSs on some neat patches 
here. 


The automatic line numbering feature in ES-CAPE can be enhanced 
by the following patches, which make the numbers track whatever 
you type. With these patches, each time an Applesoft line is 
changed via hitting return or via a CHANGE command, that line 
number plus the current increment becomes the next automatic 
line number to be generated when the space bar is pressed. 

(Now ES-CAPE works more like the S-C Macro Assembler.) 


Here are the patches for the mother-board version: 


LOAD ES-CAPE 

CALL -151 

E44:69 00 EA 

102E:4C 51 9B 

1€51:A5 51 8D 34 9B 18 A5 50 6D 35 9B 8D 33 9B 
7:90 03 EE 34 9B A5 25 FO 02 C6 25 4C 34 BF 
3D0G 

SAVE ES-CAPE REVISED 


Here are the patches for the RAM-card version: 


LOAD ES-CAPE LC 

CALL -151 

E41:69 OO EA 

102B:4C 60 El 

1B60:A5 51 8D 51 El 18 A5 50 6D 52 El 8D 50 El 
7:90 03 EE 51 El A5 25 FO 02 C6 25 4C 31 D6 
3D0G 

SAVE ES-CAPE LC REVISED 


I believe these patches make ES-CAPE even eaSier to use. If 
any of you still have not upgraded your AED II copies to 
ES-CAPE, send me $10 and your old disk and I'll return a new 
version and the great new manual. 


I am continuing to work on ES-CAPE, hoping for a new version 
around the middle of next year. What new features would you 
like? The main ones we have in mind are 80-column support, 
renumber, and merge. If you have some good ideas, drop me a 
line at 3199 Hammock Creek, Lithonia, GA 30058. 


Quickie No. Di atk Se IO EDK late a BOE EEE BOD Sander-Cederlof 
To test a byte in memory without disturbing any registers: 
INC BYTE 


DEC BYTE Restore value, and test against zero 
BEQ 
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Applesoft Source, Completely Commented.....Bob Sander-Cederlof 


For several years I have been working on this. I even bought 
an assembler from another company just to get the promised 
source code of Applesoft that came in the package, but I was 
very disappointed. (No complaints, it was intended as a 
"freebie" with their assembler.) I wanted LOTS of comments, 
MEANINGFUL labels, and I wanted it in the format of the S-C 
Macro Assembler. 


Now I have it. And you can have a copy, on two diskettes, for 
only $50. It comes in an encrypted form, with a driving 
program which creates the source code files on your machine 
with the aid of the Applesoft image in ROM or RAM. The 
encryption is meant to protect the interests of Apple and 
Microsoft. 


You need two disk drives to assemble Applesoft, a printer to 
get a permanent listing, and of course you need the S-C Macro 
Assembler. The source code is split into more than a dozen 
source files, assembled together using a control file full of 
-IN directives. After assembling and printing, you will have 
well over 100 pages of the best documentation of Applesoft 
internals available anywhere. 


In the process of writing the comments, I discovered some very 
interesting bugs. Some have been published before, and others 
I have never heard of. Just for fun, try this: 


]A%=-32768 (you get an error message, correctly) 
})A%=-32768.00049 (NO error message!) 
})PRINT A&%& (You get 32767!) 


Or open your disk drive doors, just in case, and type: 
JLIST 440311 


That last one can be disastrous! Any use of a six-digit line 
number (illegal, but not caught by Applesoft) between 437760 
and 440319 will cause a branch to a totally incorrect place. 
For example, GOTO 440311 branches to $22D9! 


The causes of these and other interesting phenomena, as well as 


some suggested improvements resulting in smaller/faster code, 
are documented in my comments. 


Quickie No. Devo ee eW te ee eee We be eae BOO Sander-Cederlof 
To shift a two-byte value right one bit with sign extension: 


LDA HI.BYTE 

ASL SIGN BIT INTO CARRY 

ROR HI.BYTE HI BYTE RIGHT ONE, CARRY (SIGN) INTO BIT 7 
ROR LO.BYTE 
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New Enhanced 6502 Nearly Here!.............BOb Sander-Cederlof 


Nigel Nathan from Micro-Mixedware in Stow, MA, sent me some 
copies of reference material for the new 65C02 chip. This is 
the enhanced CMOS version, soon to be available from GTE and 
Rockwell. 


Nigel's interest was that I might produced an enhanced S-C 
Macro Assembler to accommodate the new opcodes and addressing 
modes. I not only might...I did it right away! It iS ready 
now, although you may have some difficulty getting the chips 
for a few more months. 


Rockwell is sampling the 65C02 now, and scheduled for 
production in February. Rockwell is also readying an entire 
family of CMOS products to go with the 65C02, including 2Kx8 
CMOS static RAM and multi-byte parallel interfaces. 


The 65C02 is expected to be plug-compatible with the 6502 in 
your Apple II. In fact, Cliff Whitaker of Rockwell told me 
that the first chips they made were tested by plugging them 
into Apples. Hopefully you will be able to simply plug them in 
and start using the new opcodes. If true, then I will probably 
become a source for these chips. 


What enhancements did they make? According to the GTE 
document, some “bugs" in the 6502 deSign were corrected: 


* Indexed addressing across a page boundary no longer 
causes a false read at an invalid address. 


* Invalid opcodes are now all NOPs, rather than doing 
exotic things such as I described in the March 198] 
AAL. 


* JMP indirect at a page boundary now operates correctly, 
at a cost of one additional cycle. 


* Read/modify/write opcodes (like INC, DEC, and the 
shifts) now perform two reads and one write cycle 
rather than one read and two writes. 


* The D-status bit is now set to binary mode (D=0) by 
reset; it used to be indeterminate. 


* The N-, V-, and Z-status bitsS are now valid after ADC 
or SBC in decimal mode (D=1); they used to be invalid, 
requiring special tests. The cost is one additional 
cycle for all ADCs and SBCs in decimal mode. 


* An interrupt after fetch of a BRK opcode defers to the 
BRK. It used to cause the BRK to be ignored. 
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The Rockwell literature makes reference to the following new 
opcodes, or new addressing modes for old opcodes: 


80 BRA 
12 ORA 
32 AND 
52 EOR 
72 ADC 
92 STA 
B2 LDA 
D2 CMP 
F2 SBC 
04 TSB 
14 TRB 
34 BIT 
64 STZ 
74 STZ 
07-77 

87-F7 

89 BIT 
1A INC 
3A DEC 
5A PHY 
7A PLY 
DA PHX 
FA PLX 
le TSB 
1C TRB 
3C BIT 
7C JMP 
9C STZ 
9E STZ 
OF-7F 


SF-FF 


rel 


(zp) 
(zp) 
(zp) 
(zp) 
(Zp) 
(zp) 


zp 
Zp,X 


RMB b,zp 
SMB b,zp 


imm 


abs 

abs 

abs ,X 
(abs) ,X 
abs 


abs ,X 


BBR b,zp,rel 
BBS b,zp,rel 


Branch Always 


new addressing mode: 
zero-page indirect 


without indexing 


Test and set bits 
Test and reset bits 
new addressing mode for BIT 
Store Zero 
" 


Reset bit b in zp 
Set bit b in zp 


new addressing mode for BIT 


Increment A-register 
Decrement A-register 
Push Y 

Pull 
Push 
Pull 


ms KK 


Test and set bits 

Test and reset bits 

new addressing mode for BIT 
new addressing mode for JMP 

Store zero 


Store zero 


Branch if bit b in zp is zero 
Branch if bit b in zp is one 


Let your imagination run wild with all the great ways to use 


these new opcodes! 


If you feel the need for the ability to 


assemble them now, the Cross Assembler upgrade for the 65C02 is 
available for $20 to subscribers of the Apple Assembly Line who 
already own the S-C Macro Assembler. 
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‘the F051 


“HARDCORE Computing 
about the latest technology that companies 
are using against them." TIME, Feb. 8, 1982 


controversial 


“When some Apple enthusiasts 


Computer 


heard 


about the boycott (of bit-copy ads), they con- 
cluded that it was nothing but censorship and 
another exampie of the magazines ignoring 
the average Apple user to placate their adver- 
tisers. So they started their own publication, 


HARDCORE Computing 


what IS hardcore computing 7 


* ESQUIRE, Jan. 1982 


mMagaeine 


—)) | 


its a HOW TO” guide for users 


l about 
DOS 


pilus... 


Lots of complete program listings from the 
HARDCORE Program Library of copyable software 


UPCOMING eer 


How To Write Your Own Data Base 
Using text files and EXEC 
CALLing DOS routines from BASIC 


source listings of special DOS routines 


applesoft tricks ‘n treats PEEKS | 
ampersand (&) utilities 
subroutine master library POKES 


and 


warns pirates 


Sy wT hardcore 


rey ‘ 
&) e 


the 
~ censored 
‘secrets 


behind 


the 


“methods |?.. 


and | = 
<i i. 
Cia 


_ madness = 
‘commercial aa 


—copy-protection: -) \® 


Ee 


HardCore Computing is a quarterly magazine. 
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ALSO HOW TO: 3 
Market your software. : 
i Copy- “protect your disks. ee 
Normalize. altered D.0.S.. Z 


“Use bit-copiers to make back 


PLUS Game, Utility, Business, - fe 
"Educational ‘program listings. BE. 


‘for Serious . 2 
“Apple. ‘computerists! | 


| 
| ef | | | 
b eee. ee 4 
femess fy tl | 
ie ee 
joes & s ; | | 
“= Bo | | 
| == Os = | | 
oO | ' 
| te ; i 8 | 
| fm 572 P| 
l@i res | | | el 
| APS ess | | | a | 
| Ooze | # 
te BBS 7 | 
a sc 
| . 
: < | 
All About Graphics! = ne a 
epee etn o 
Program Utilities. lcm 238 ee 
Games ? [pe < Se 8 ¢ | | | 
gcse oy Ba eS 
= REX jai dat & zz 2 GS & | 
~ Norte —S The cad ie ae satan eee a es | 
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Toggling Upper/Lower Case in the S-C Macro Assembler......... 
Steven Mann 
Psycholegy Dept. 
Univ. of So. Dakota 
P. O. Box 7187 
Grand Forks, ND 58202 


I have made the necessary modifications to the assembler (and 
to my Apple) that allow me to enter lower case characters in my 
source programs, but have found that I like to have all upper 
case in certain sections (the labels and opcodes) and mixed 
(mostly lower) case only in the comment field. In order to do 
accommodate this most effectively, I wanted to be able to 
toggle back and forth from upper to lower case while I was 
entering my source code, 


The simplest solution for me was to patch the assembler to 
accept one of the escape key sequences as an upper/lower case 
toggle. From back issues of AAL I was able to determine that a 
table of address vectors for the escape keys A-L is maintained 
from $1467 thru $1482 (S$D467 thru $D482 in the language card 
version). Each two-byte entry is the address-1 (low byte 
first) of the routine that will handle that particular escape 
sequence, 


Certain of the sequences are already taken (e.g. ESC L loads a 
disk file; ESC I,J,K, and M move the cursor, etc.) Since I 
don't use the ESC A,B,C,D cursor moves, I selected the ESC A 
sequence as the code for the case toggle. I also used ESC C 
for "CATALOG", as suggested by Bill Morgan some months back in 
these pages, 


Implementation of the toggle is accomplished with the following 
patches to the HELLO program (for the RAM version of the 
assembler.) First, line 50 should be changed to: 


50 PRINT A: IF A=1 THEN PRINT CHRS$(4)"BLOAD S-C.ASM.MACRO" 
:GOSUB 200: CALL 4096 


The subroutine at 200 is as follows: 


197 REM 

198 REM ESC A TOGGLES UP/LOW CASE 

199 REM 

200 POKE 5229,109:POKE 5230,165 

210 FOR I=1l TO 9:READ J:POKE 48350+1,J:NEXT 
220 DATA 173,22,16,73,255,141,22,16,96 


230 RETURN 

240 REM 

250 REM ROUTINE RESIDES AT SBCDF 
260 REM 

270 REM CODE IS AS FOLLOWS: 
280 REM 

290 REM LDA $1016 

300 REM EOR #FF 

310 REM STA $1016 

320 REM RTS 

330 REM 
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Note that I put the patch code at S$BCDF, which is in an unused 
area inside DOS 3.3. If you have already used this area for 
other purposes, you can tack the patch on to the end of the 
assembler image instead. 


The actual code is very simple. The upper/lower case flag is 
stored at $1016 and is either a $00 or a SFF (in binary all 
zeros or all ones.) Toggling the flag involves loading the 
current flag and EORing it with #SFF. This will cause all set 
bits to be cleared and all clear bits to be set, so the zeros 
become ones and the ones become zeros. Thus, an #SFF byte 
becomes a #$00 or a #$00 becomes an #SFF. The new flag value 
is then stored back in $1016. 


For the language card version the program is basically the 
same, but slightly longer due to the need to first write enable 
the language card. The code looks like this: 


PATCH LDA $C083 Two of these in succession 
LDA $C083 write-enable the card 
LDA $D016 Get the flag 
EOR #SFF Complement it 
STA $D016 Save the new flag 
LDA $C080 Write protect the card 
RTS 


I put the code in the same place as in the RAM version (SBCDF) 
and put it into memory from the LOAD LCASM exec file which 
loads the assembler onto the card. Two lines need to be added 
to the file. Between lines 1070 and 1080 (asSSuming your 
version has not been modified) you need to place these two 
lines: 


1072 D469:DE BC 
1074 BCDF:AD 83 CO AD 83 CO AD 16 DO 49 FF 8D 16 DO AD 80 
CO 60 


The first line places the address of the case toggle handler in 
the escape vector table and the second line contains the 
assembled source code listed above. If you are not sure how to 
modify the LOAD LCASM file see the step by step description 
given in the May 1982 AAL (page 3). 


After you have made the patch, experiment with the toggle. One 
particularly valuable feature is that you can toggle the case 
within a single line as you enter the line. This means that 
you can enter the label and opcode in upper case, tab over to 
the comment field, toggle the case flag, and then enter your 
comment in lower case. 


I have found using the case toggle to be easy while improving 
the appearance and readability of my source listings. The only 
problem I have encountered so far is that the flag can not be 
toggled from within the edit mode (either case can be used in 
the edit mode, but you can't change the case in the middle of 
editing.) If any of you find a way to add this to the 
assembler be sure to let me know. 
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S&H Software 


is Speeding up The Apple! 


The DOS Enhancer (TDE) 
works up to 500% faster than 
standard Apple DOS 3.3...$69.95 


TIRED OF WAITING... foryour programs to load or 
save? Then S&H’s TDE, licensed by Apple, is the 
answer. 


TDE program updates standard Apple DOS 33 disks — or creates 
copyable TDE disks — with TDE’s QuickDOS and Quick-load features 

TDE’s QuickDOS runs and saves BASIC and binary programs up to 5 
times faster* and 1s completely compatible with standard Apple NOS 33 
programs 

TDE ‘Quick-loads’ the RAM card with FPBASIC/INTBASIC. QuickDOS or 
user program in 1 7 seconds at Startup 

TDE "package" includes utility disk, training/support disk, step-by-step 
instruction manual, S&H's Supercat/menu, and multidrive “Quick-copy” 
program. 

TDE system requirements 48K Apple |[ or j[+ ROM/RAM card. 00S 33 
and one or more disk drives 


Here’s what the critics say: 


@John Mitchener of PEELINGS Il “The speed increase with TDE 1s 


awesome and 1s probably worth the price of the program alone. without all the 
other features AA rating 


“To achieve speeds even taster than a hard-disk drive c 
320K Memory System 


Available Irom your dealer Mail Order: Send checks to S&H Sottware 58 Van Orden Rd Harrington Park NJ 07640 201 768-3144 
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@ Val Golding. Editor of Call: APPLE “(TDE) stands as a shining exam- 
ple of how utility and application programs take into account every possible sys- 
tem configuration 

@ Clark Congleton of The Apple Orchard “The Quick-load capabilities will 
make this package attractive to anyone who spends a lot of time at the 
keyboard © 

@ Chuck Carpenter of INFOWORLD “Results ina disk that will boot — very 


fast — in any Apple system" 


Amper-Sort/Merge (A-S/M II) 
works up to 1000% faster than even 
VisiCorp’s VisiFile program...$69.95 


A-S/M tis the fastest “file clerk” you've ever met. Of all the sort utilities 
developed to manage Apple || data files none does the job nearly so 
fast as A-S/M II! 

A-S/M th’s new features include S&H’'s superfast VisiFile index sort 
(callable from within VisiFile for effortless use). an equally fast S&H random 
access file index sort. and parameter file editing P 

A-S/M Ii can sort/merge from one to five unsorted files into a single file of 
up to 125K tn size per disk 

A-S/M II's “package ‘ncludes utility disk. training disk. step-by-step 
instruction manual. and S&H's new Supercat/menu 

A-S/M It's system requirements 48K Apple ][ with ROM or RAM card or 
48K Apple ][+ with OOS 33 and Disk II 


S&H 


Dealer inquiries invited 1 Software 


Apple 's a reqistered trademark of Apple Computer tnc 


Credit Cards: Phone C vbertronics International at 212-532 3089 
{Overseas Arman Add $3 00 postage and handling | 


Save Garbage by Emptying Arrays............Bob Sander-Cederlof 


As we all know, Applesoft programs which use a significant 
number of strings can appear to die for long periods of time 
while "garbage collection" is performed. Many techniques have 
been published to reduce the frequency of garbage collection, 
or reduce the amount of garbage to be collected, or to speed up 
the collector. 


Randy Wiggington published a much faster garbage collector in 
"Call-A.P.P.L.E.", January, 1981, pages 40-45. The source code 
is available in S-C format on the Dallas Apple Corps disk of 
the month for March, 1981. (Copies available for $10 from me.) 
Randy's speed improvement is gained by searching for the 
highest 16 strings in memory at once, rather than just the 
highest one string. It is much faster, but not the fastest. 
The time for collection still varies quadratically with the 
number of strings in use, 


Cornelius Bongers wrote the fastest collector I have seen. It 
was published in "MICRO -- The 6502/6809 Journal", August, 
1982, pages 90-97. Corny's method is very straightforward, and 
has the advantage that execution time varies linearly with the 
number of strings in use. His method also has the disadvantage 
that it does not work if any strings contain any characters 
with the high bit on. (Applesoft normally does not generate 
any strings with high-bit-set-characters, but you can do it 
with oddball code.) I typed in the program from MICRO, made a 
few changes here and there, and found it to be lightning fast. 


I installed the linear method in a client's program, and his 
garbage collection time went from 100 seconds after printing 
every four lines, to only 1/4 second. Other changes, such as 
the one described below, cut the interval of collection to once 
every 12 lines. 


It so happens that strings which are empty do not increase the 
garbage collection time. Many times in Applesoft programs a 
string array is filled with data from a disk file, processed, 
and then filled with fresh data, and so on. By emptying the 
array before each pass at reading the disk file, the number of 
active strings can be greatly reduced, 


One of my programs was like this: the one that prints your 
mailing label so that the AAL gets to you every month. Before 
reading each file (the list is divided into about 12 different 
files, based on zip code and other factors), I wrote a loop 
that set each string in the array to a null string, and then 
forced garbage collection: 


FOR I = 1 TO NH AS$(I)="" NEXT F = FRE(0) 


The only problem with this was that the loop takes so long! 
About ten seconds, anyway, enought to try my patience. 


All the above motivated me to write the following little 


Subroutine, which nulls out (or empties) a string array. 
Bongers included an array eraser in his article, which 
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completely released an array; however, that requires re-DIMming 
the array each time. My program is faster in my case, and it 
was fun to write. 


The program is listed below with the origin set at $300, so 
"CALL 768,arrayname” will activate it. It happens to be fully 
relocatable, so you can load it anywhere in memory you wish. 
You could easily add it to your Applesoft program with 
Amper-Magic or Amperware or The Routine Machine. 


I used three subroutines inside the Applesoft ROMs. CHKCOM 
gives SYNTAX ERROR unless the next character is a comma. I use 
it to check for the comma that separates the call address from 
the array name. CHKSTR checks to make Sure that the 
last-parsed variable is a string variable, and gives TYPE 
MISMATCH if not. GETARYPT scans an array name and returns the 
address of the start of the array in variable space. 


If you look at page 137 of your Applesoft reference manual, you 
will see in the third column a picture of a string array. 
(Notice first the error: the signs of the first and second 
bytes of the string name are just the reverse of what the book 
Says.) My program looks at the number of dimensions to 
determine the size of the preamble (the number of bytes before 
you get to the actual string pointers). 


I use the preamble size to compute the starting address of the 
string pointers, and the number of bytes of string pointers 
that there are. Then a tight little loop stores zeros on top 
of all the descriptors. 


The Applesoft program below illustrates the CLEAR subroutine in 
action. 


100 DIM A$(25),B$(5) 

105 FOR I = 0 TO 5:BS$(I) = "ABCD": NEXT 

110 FOR I 0 TO 25:N = INT ( RND (1) * 5) + 1 

120 FOR J 1 TO N:A$(I) = AS(I) + CHRS ( RND (1) * 26 + 65): NE) 
: PRINT LEN (AS$(I))":"AS(I), 

130 NEXT : PRINT : PRINT 

140 CALL 768,A$ 

150 FOR I = 0 TO 25: PRINT LEN (AS(I))":"AS(I),: NEXT 

155 PRINT : PRINT 

160 FOR I = 0 TO 5: PRINT BS(I),: NEXT 

170 GOTO 110 
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QuicKkTRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until itis desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
iItions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes to the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
Information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE is 
alive. 


QUICK TRACE is a beautiful way to show the 


incredibly complex sequence of operations that 
a computer goes through in executing a program 


QutcK TRACE $60 


Ix a trademark of Anthro-Digital, Inc. 
Copyrizhe © 1981 
Written by John Rogers 


fine computer stores. 


Anthro - Digital Software, Inc. 


See these programs at participating Computerland and other 


P.O. Box 1385 Pittsfield, MA 01202 
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F7D9- 
DD6C- 
DEBE- 


009D- 
009B- 


0300- 
0303- 
0306- 
0309- 
030B- 
030D- 
030E- 
0310- 
0312- 
0314- 
0315- 
0317- 
0319- 
031A- 
031B- 
031D- 
O31F- 
0320- 
0321- 
0323- 
0325- 
0327- 
0329- 
032B- 
032D- 
032E- 
0330- 
0331- 
0333- 
0334- 
0336- 
0338- 
0339- 
033B- 
033C- 
033E- 
033F- 
0341- 
0342- 
0344- 
0346- 


Apple 


GETARYPT 


CHKSTR 
CHKCOM 


FAC 
LOWTR 


CLEAR 


~-EQ SF7D9 
~EQ SDD6C 
-EQ SDEBE 


$9D 


CHKCOM 


GETARYPT 


CHKSTR 
#4 


(LOWTR) ,Y 


#5 
FAC 
#2 


(LOWTR) , Y 


FAC 


(LOWTR) ,Y 
#0 


LOWTR 
FAC 
LOWTR 
eZ 
LOWTR+1 
#0 


~4 


(LOWTR) ,Y 


a3 
LOWTR+1 


< 
6 
#0 


(LOWTR) ,Y 
& 


COMPUTE SIZE OF PREAMBLE 


# OF DIMS 
*2, CLEAR CARRY 
+5 


SAVE PREAMBLE SIZE 
POINT AT OFFSET 
COMPUTE ARRAY LENGTH 


# BYTES IN PARTIAL PAGE 


# WHOLE PAGES 


POINT AT BEGINNING OF DATA 


# WHOLE PAGES 


SET A=0 


COUNT WHOLE PAGES 


FINISHED 
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Splitting Strings to Fit Your Display......Bob Sander-Cederlof 


Printing text on the screen, Or even on a printer, is not as 
easy at it ought to be. The problem is splitting words at the 
right margin. Word processors handle it nicely, but what do 
you do in an Applesoft program? 


You might write a subroutine, in Applesoft, which looks for the 
first space between words before a specified column position. 
The subroutine could split a string at the space into two 
substrings: one containing the next display line, the other 
the remainder of the original string. 


You might. But believe me, it builds up a lot of garbage 
strings and takes a long time to execute. If you like the 
general approach, you might try coding the subroutine in 
assembly language. You can avoid garbage build-up and save 
lots of running time, so it is probably worth the effort. 
Especially since I already wrote the program for you! 


The program is written to be called from an ampersand parser 
like the one in last month's article on REPEAT/UNTIL. Or, you 
can use it with Amper-Magic, Amperware, The Routine Machine, 
etc. It is fully relocatable, having no internal data or 
JMP/JSR addresses. I set the origin to $300, but it can be 
loaded and used anywhere without re-assembly. 


Here is an Applesoft program to show how to call SPLIT: 


100 POKE 1014,0: POKE 1015,3 

120 FOR N = 5 TO 40 STEP 3: GOSUB 1000: NEXT : END 

1000 AS = “NOW IS THE TIME FOR ALL GOOD MEN TO COME 
TO THE AID OF THEIR PARTY.” 

1005 & ,AS$,BS,N 

1010 PRINT BS 

1020 IF A$ < > "" THEN 1005 

1025 PRINT 

1030 RETURN 


Call SPLIT with three parameters. The first (A$ above) is the 
source string, which will be split. After SPLITting, the 
remainder string will be left in AS. 


The second parameter, BS$ above, will receive the left part, 
including the last complete word, up to N (the 3rd parameter) 
characters. If there is no space in the left N characters, 
exactly N characters will be split. 


Here are some of the printouts from the test program: 


N=5 N=]l N=20 
NOW NOW IS THE NOW IS THE TIME FOR 
Is TIME FOR ALL GOOD MEN TO COME 
THE ALL GOOD ‘TO THE AID OF THEIR 
T1ME MEN TO COME PARTY. 

etc, ~- etc. 
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(000: Heeetetoteces reece theese eeewes 
1010 # & SPLIT,A$,B$,W 
1020 # 
1030 s A$ -- SOURCE STRING 
10 o 8 W -- MAXIMUM WIDTH OF SPLIT 
50 
1060 * B$ -- LEFT W CHARS OF A¢ 
1070 # A$ -- REST OF A$ 
1090 ® , 
4440 TF eee 
$100 Gace se oso eee cee ee ewes 
0050- 1130 LINNUM .EQ $50,51 
0006- 1140 DPTRA “EQ $06,07 
0008- 1190 DPTRB “EQ $08,09 
OOFE- 1 0 SPTRA (EQ $FE,FF 
DEBE- 1180 AS.CHKCOM .EQ $DEBE 
ET E3e 1200 ASLOETADR [EO SETER 
DD67- 1210 AS . FRMNUM -EQ $DD67 
0303 50 E 3 DF j5ho et? SSR RS  Stnoee GET SOURCE STRING 
0306- 85 0 1250 STA DPTRA 
0308- 84 07 1260 STY DPTRA+1 
0 308- 20 BE DE 1270 JSR AS.CHKCOM ANOTHER COMMA 
O20D- 20 E 3 DF 1280 JSR AS.PTRGET GET TARGET STRING 
0310- 85 0 1290 STA DPTRB 
ae - BE BE 4aic Sho AS. CHECO OTHER COMM 
S J . CHKCOM ANOTHE MMA 
3172 20 67 DD 1320 JSR AS.FRMNUM 
O31A- 20 52 ET 1330 JSR AS.GETADR GET MAXIMUM WIDTH 
031D- AO 02 1340 LDY #2 
03 1F- B 06 1390 LDA (DPTRA),Y 
cba Ya 
0325-88 1380 ier 
e RA),Y 
A 85 FE 1880 STA SPTRA  - 


Supercharge Your APPLE II* 


Plug-in compatibility 


320K bytes of RAM (200NS) memory designed 
to function like two 35 track floppy disk drives 


Compatible with Apple DOS 3.3 and Apple 
Pascal 1.1 


Same size as the Apple Disk II* Drive 


Invisible memory refresh even with the Apple 
turned off 


Rechargeable battery system built-in to pro- 
The Axion RAMDISK™ 320K Memory System tor vide 3 hours of auxiliary power 
the Apple Il and Apple I! Plus* provides access 
speeds never before available. The Axion memory Slot independent interface board draws no” 
system is designed to interact with Apple DOS power from your Apple 
3.3° and Apple Pascal 1.1° like two standard flop- 
py disk drives while delivering the lightning fast All firmware is in static RAM on the interface 
access speeds of RAM memory This also leaves board 
32K of RAM for advanced programming techni- 
ques. The interface board is slot independent and Inciudes software for diagnostic, fast load and 
draws no power trom your Apple. The copy routines, and business applications 
rechargeable battery system built into the unit 
provides three hours of backup in the event of a 
power loss Drop by your local Apple dealer or 170 N. Wolfe Road, 
contact Axlon. Inc for more information 

Sunnyvale, CA 94086 


(408) 730-0216 


Trademark of Appte Cumputer dine 


Pascal is a Trademark of UC SO Regents 
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O32A- 9 1 08 1410 STA (DPTRB),Y 
032c- 88 1420 DEY 
032D- A5 50 1430 LDA LINNUM 
gash Bo oS HER GRE Correa x 
0333- BI 06 1460 LDA (DPTRA} »¥ A$ SHORTER THAN OR SAME 
0337 - Rg 00 1480 LDA 3 ' 8 
TEC ae es ees 
15 10 Wwe eice So ee te sees ei Sete Ba 
033C- a8 1239 4 TAY 
033D- Bi FE 15 30 2 LDA (SPTRA),Y LOOK AT SPLIT BOUNDARY 
Bains Gg) gag gue eO rbd Bua" 
034 3° BB 1220 DEY — 
O344- DO 1570 BNE .2 BACK UP THE SPLIT 
1580 #---NO BLANK IN W CHARS---------- 
O38 - BO Ok 1200 ne Cy NNOM ALWAYS 
O34A- 98 ee re es 
hat ee aN came “oot oe PEA 
O34E- AO 00 1650 .4 LDY #0 LENGTH OF B$ 
0350- 91 08 1660 STA (DPTRB),Y 
Sipe Ey og TER EBE copggy)et—Meworn oF ag 
0357- 91 06 1700 STA (DPTRA),Y 
0359- C¢ 1710 INY 
tae (8 1420 CLC 
035B- Bi 06 1730 LDA (DPTRA),Y 
gap 62 ge ASR HEN 
O32h7 a4 1420 INY : 
0362- B1 06 1770 LDA (DPTRA),Y 
0364- 69 OO 1780 ADC #0 
0366 - 94 06 17.90 STA (DPTRA),Y 
0368- 60 1800 RTS 


DISASM (Version 2.2) $30.00 
Use DISASM, the intelligent disassembler, to convert 46502 machine code into meaningful, symbolic source. 
It creates a text file which is directly compatable with DOS ToolKit, LISA and S-C (both 4.0 & Macro) 
Assemblers. Use DISASH to customize existing machine language programs to your ow needs or just to see 
how they work. DISASM handles multiple data tables, invalid op codes and displaced object code (the 
program being disassembled doesn’t have to reside in the memory space in which it executes). DISASN lets 
you even substitute MEANINGFUL labels of your own choice (100 commonly used Monitor & Pg Zero names 
included in Source form to get you rolling). The address-based cross reference table option results in 
either a selective or complete cross reference (to either screen or printer). Page Zero and External 
references are listed separately in numeric order. The cross reference table provides as much insight 
into the inner workings of machine language programs as the disassembly itself. DISASH has proven to be 
an invaluable aid for both the novice and expert alike. 


Utilities Far Your S-C Assembler ©€4.0) 
SC.G5R: A Global Search and Replace Eliminates Tedious Manual Renaming Of Labels 
SC.XREF: A Linenumber-Based Global Cross Reference Table For Complete Source Documentation 
SC.TAB: Tabulates Source Files Into Neat, Readable Form. Encourages Fast, Free-Format Entry.... 
SC UTILITY PAK: Includes All Three Utilitses Described Above (You Save $10.00) 


All of the above programs are written entriely in machine language and are provided 
on a Standard 3.3 DOS formatted diskette. 


AYoId A $3.00 Shipping/Handling Charge By Mailing Full Payment With Order 


RAK - WA RE 
41 Ralph Road 
West Orange NJ Q7052 


sexex SAY TOU SAW TT IN “APPLE ASSEMBLY LINE ' basi 
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Enhancing Your Apple II (A Review)....eeeeeeseeeeeseeBill Morgan 


Don Lancaster, the well-known author of electronics books for 
the hobbyist (and a subscriber to AAL), has now entered the 
Apple arena in a big way. His latest book, “Enhancing Your 
Apple II, Vol. 1", promises.to be the start of a long series of 
easy-to-use guides to the important internal workings of the 
Apple. 


The main enhancements he offers in this volume are simple 
modifications to the Apple's video circuitry, to allow EXACT 
software access to the video timing. This permits your program 
to play all sorts of tricks with the display modes. There is 
also a wealth of information on the Apple's techniques of video 
Storage and output. 


The basic hardware modification is a single wire from an IC in 
the video circuitry to either the cassette or the game input. 
With this wire and a little bit of code, it iS easy to switch 
display modes between screen scans, avoiding a lot of messy 
glitches on the screen. With more code, and careful timing, 
you can lock the processor to the display timing and switch 
between text and graphic modes (hi-res or lo-res) in mid-line. 


There is also a very good 60-page chapter on disassembling and 
understanding other people's programs. Don presents a novel 
technique of color-coding a printout of a monitor disassembly, 
to bring out the structure of a program and the function of 
each routine. The example program is Apple's High-Res 
Character Generator, from the DOS Toolkit. He later uses the 
information discovered about the character generator and the 
Hi-Res display to develop a slower and smoother scrolling 
routine for Hi-Res text. 


He shows us other enhancements, aS well. There are two 
different ways to attach a modulator's output line to your TV 
set, avoiding that clumsy little switch box that the 
manufacture gives us. How about a programmable color-killer 
Circuit? With this one you can have software control of color 
vs. black-and-white display. There are sections about 
generating extra colors, in both Hi-Res and Lo-Res graphics. 


In the back of the book are postcards for sending feedback and 
ordering other materials. All the code in the book (26 
programs) can be ordered on diskette, for $14.95. He uses the 
DOS Toolkit Assembler, but we plan to talk to him about 
providing the programs in S-C format. You can also order a kit 
of the parts for all of the hardware modifications he 
describes, That kit costs only $11.95 + shipping, from a 
dealer in Oklahoma. Future plans include more volumes of 
enhancements and a possible bulletin board system for updates 
to the books. 


All in all, "Enhancing Your Apple II" looks to be an important 
and useful book. Like all of Lancaster's books, it is 
published by Howard W. Sams. It is 232 pages long, size 8 1/2 
X 11 inches, and sells for $15.95. We have ordered a stock 
here at S-C, and will sell them for $15.00 + postage. 
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For Volume 2 of the "Enhancing" series, he hasS promised us more 
video techniques, a keyboard enhancer, something called an 
"Adventure Emergency Toolkit", graphics software for 
daisy-wheel printers, a two-dollar interface for the BSR 
controller, and much more, I'm looking forward to it! 


This is a good time to mention another of Don's books, which 
has received too little attention. I am speaking of "The 
Incredible Secret Money Machine". Despite the title, it is not 
a get-rich-quick pamphlet, but rather a very, very useful guide 
to starting and operating a free-lance technical or craft 
business. "Money Machine" is 160 pages of tightly packed 
information on strategy and tactics, getting started, and 
dealing with customers, suppliers, and the government. 


There is enough practical advice on communication, both verbal 
and graphic, to make up several courses in advertising and 
technical writing. Bob and I refer to this book regularly, and 
have long felt that it is one of the best books around for the 
budding entrepeneur. We have also ordered "Money Machine", and 
will sell it for $7.50 + postage. 


Last minute addition: We just received a review copy of 
another new book from Don Lancaster, Micro Cookbook Vol. l - 
Fundamentals. This one is a very basic introduction to 
microcomputer principles. He talks about how to learn and what 
to learn, and introduces some hardware fundamentals. He also 
promises Vol. 2, about Machine-Language Programming. It looks 
very good; I'll have more details next month. We especially 
like this sentence at the end of the Preface: This book is 
dedicated to the 6502. 


Last last-minute addition: Don sent me a copy of the program 
disk, and I am now converting the source files to S-C format. 
By the time you read this, he will have the S-C code. When you 
order the diskette from Synergetics (Lancaster's company), just 
mention that you want the version with the S-C files. 


Quickie No. Oe ase ieee Wik CB EWE eee DOU Sander-Cederlof 
To print a two byte value in hexadecimal: 
LDA HI.BYTE 


LDX LO.BYTE 
JSR $F941 
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Apple Assembly Line....December, 


Clarification on Loading the RAM Card...........Paul Schlyter 


Last month Bob S-C told how to use an EXEC command file without 
ENDing an Applesoft program. His example may have obfuscated 
the process of loading a file into a RAM card, because it 
really is not necessary to use an EXEC file for this purpose. 


You can BLOAD into the RAM card without leaving Applesoft, 
contrary to Bob's information, by merely write-enabling it. 

The soft-switches $C081 and $C089 write-enable the RAM card 
(with bank 2 or bank 1 at $D000, respectively), leaving the 
motherboard ROMS read-enabled. This means everything you write 
goes into the RAM card, and everything you read comes from the 
motherboard ROMS. Thus you can simply BLOAD into the RAM card, 
and BLOAD will write to those addresses. 


Here is a short program that loads the whole 16K RAM card, all 
from within a running Applesoft program, without EXEC files. 


100 DS = CHRS (4) 
110 B2 = 49281 : REM S$C0O81 -- SELECT BANK TWO 
120 Bl = 49289 : REM S$C0O89 -- SELECT BANK ONE 


130 P = PEEK(B2) + PEEK(B2) : REM WRITE ENABLE BANK TWO 
140 PRINT DS"BLOAD LC.BANK 2" 
150 P = PEEK(B1l) + PEEK(B1l) : REM WRITE ENABLE BANK ONE 
160 PRINT DS"BLOAD LC.BANK 1" 


[ Note from Bob S-C: My face is red! Paul will note that I 
modified his program above in lines 130 and 150. He wrote "130 
POKE B2, PEEK(B2)" and similarly for line 150. However, some 
RAM cards, such as my Andromeda board, will disable 
write-enable if the soft-switches are addressed during a 
write-cycle. The POKE does just that; therefore, I changed 130 
and 150 to do two PEEKS ina row. Further, I recall when 
working with a Corvus drive last year that BLOADing from a 
Corvus into the RAM card did not work unless a monitor had 
already been copied into the space from SF800-SFFFF. ] 
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